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Encoding Dublin Core Metadata in HTML 


Status of this Memo 


This memo provides information for the Internet community. It does 
not specify an Internet standard of any kind. Distribution of this 
memo is unlimited. 


Copyright Notice 
Copyright (C) The Internet Society (1999). All Rights Reserved. 
1. Abstract 


The Dublin Core [DC1] is a small set of metadata elements for 
describing information resources. This document explains how these 
elements are expressed using the META and LINK tags of HTML 
[HTML4.0]. A sequence of metadata elements embedded in an HTML file 
is taken to be a description of that file. Examples illustrate 
conventions allowing interoperation with current software that 
indexes, displays, and manipulates metadata, such as [SWISH-E], 
[freeWAIS-sf2.0], [GLIMPSE], [HARVEST], [ISEARCH], etc., and the Perl 
[PERL] scripts in the appendix. 


2. HTML, Dublin Core, and Non-Dublin Core Metadata 


The Dublin Core (DC) metadata initiative [DCHOME] has produced a 
small set of resource description categories [DC1], or elements of 


metadata (literally, data about data). Metadata elements are 
typically small relative to the resource they describe and may, if 
the resource format permits, be embedded in it. Two such formats are 


the Hypertext Markup Language (HTML) and the Extensible Markup 
Language (XML); HTML is currently in wide use, but once standardized, 
XML [XML] in conjunction with the Resource Description Framework 
[RDF] promise a significantly more expressive means of encoding 
metadata. The [RDF] specification actually describes a way to use 
RDF within an HTML document by adhering to an abbreviated syntax. 
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This document explains how to encode metadata using HTML 4.0 
[HTML4.0]. It is not concerned with element semantics, which are 
defined elsewhere. For illustrative purposes, some element semantics 
are alluded to, but in no way should semantics appearing here be 
considered definitive. 


The HTML encoding allows elements of DC metadata to be interspersed 
with non-DC elements (provided such mixing is consistent with rules 
governing use of those non-DC elements). A DC element is indicated 
by the prefix "DC", and a non-DC element by another prefix; for 

example, the prefix "AC" is used with elements from the A-Core [AC]. 


3. The META Tag 
The META tag of HTML is designed to encode a named metadata element. 


Each element describes a given aspect of a document or other 
information resource. For example, this tagged metadata element, 


<meta name = "DC.Creator" 
content = "Simpson, Homer"> 


says that Homer Simpson is the Creator, where the element named 
Creator is defined in the DC element set. In the more general form, 


<meta name "PREFIX.ELEMENT_NAME" 
content = "ELEMENT _VALUE"> 


the capitalized words are meant to be replaced in actual 
descriptions; thus in the example, 


ELEMENT NAME was: Creator 
ELEMENT VALUE was: Simpson, Homer 
and PREFIX was: DC 


Within a META tag the first letter of a Dublin Core element name is 
capitalized. DC places no restriction on alphabetic case in an 
element value and any number of META tagged elements may appear 
together, in any order. More than one DC element with the same name 
may appear, and each DC element is optional. The next example is a 
book description with two authors, two titles, and no other metadata. 


<meta name = "DC.Title" 

content = "The Communist Manifesto"> 
<meta name = "DC.Creator" 

content = "Marx, K."> 
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<meta name = "DC.Creator" 
content = "Engels, F."> 

<meta name = "DC.Title" 
content = "Capital"> 


The prefix "DC" precedes each Dublin Core element encoded with META, 
and it is separated by a period (.) from the element name following 
it. Each non-DC element should be encoded with a prefix that can be 
used to trace its origin and definition; the linkage between prefix 
and element definition is made with the LINK tag, as explained in the 
next section. Non-DC elements, such as Email from the A-Core [AC], 
may appear together with DC elements, as in 


<meta name = "DC.Creator" 
content = "Da Costa, Jos&eacute; "> 
<meta name = "AC.Email" 
content = "dacostaj@peoplesmail.org"> 
<meta name = "DC; Tit Le" 
content = "Jesse &#34;The Body&#34; Ventura--A Biography"> 


This example also shows how some special characters may be encoded. 
The author name in the first element contains a diacritic encoded as 
an HTML character entity reference -- in this case an accented letter 
E. Similarly, the last line contains two double-quote characters 
encoded so as to avoid being interpreted as element content 
delimiters. 


4. The LINK Tag 


The LINK tag of HTML may be used to associate an element name prefix 
with the reference definition of the element set that it identifies. 
A sequence of META tags describing a resource is incomplete without 
one such LINK tag for each different prefix appearing in the 
sequence. The previous example could be considered complete with the 
addition of these two LINK tags: 


<link rel = "schema.DC" 

href "http://purl.org/DC/elements/1.0/"> 
<link rel "schema.AC" 

href = "http://metadata.net/ac/2.0/"> 


In general, the association takes the form 


<link rel = "schema.PREFIX" 
href = "LOCATION_OF_DEFINITION"> 
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where, in actual descriptions, PREFIX is to be replaced by the prefix 


and LOCATION_OF_DEFINITION by the URL or URN of 
document. When embedded in the HEAD part of an 
of LINK and META tags describes the information 
HTML file itself. Here is a complete HTML file 


the defining 

HTML file, a sequence 
in the surrounding 
with its own embedded 


description. 
<html> 
<head> 
<title> A Dirge </title> 
<link rel = "schema.DC" 
href = "http://purl.org/DC/elements/1.0/"> 
<meta name = "DC.Title" 
content = "A Dirge"> 
<meta name = "DC.Creator" 
content = "Shelley, Percy Bysshe"> 
<meta name = "DC.Type" 
content = "poem"> 
<meta name = "DC.Date" 
content = "1820"> 
<meta name = "DC.Format" 
content = "text/html"> 
<meta name = "DC.Language" 
content = "en"> 
</head> 
<body><pre> 


Rough wind, that moanest loud 
Grief too sad for song; 
Wild wind, when sullen cloud 
Knells all the night long; 
Sad storm, whose tears are vain, 
Bare woods, whose branches strain, 
Deep caves and dreary main, - 
Wail, for the world’s wrong! 
</pre></body> 
</html> 


5. Encoding Recommendations 


HTML allows more flexibility in principle and in practice than is 
recommended here for encoding metadata. Limited flexibility 
encourages easy development of software for extracting and processing 
metadata. At this early evolutionary stage of internet metadata, 
easy prototyping and experimentation hastens the development of 


useful standards. 
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Adherence is therefore recommended to the tagging style exemplified 
in this document as regards prefix and element name capitalization, 
double-quoting (") of attribute values, and not starting more than 
one META tag on a line. There is much room for flexibility, but 
choosing a style and sticking with it will likely make metadata 
manipulation and editing easier. The following META tags adhere to 
the recommendations and carry identical metadata in three different 
styles: 


<META NAME="DC.Format" 
CONTENT="text/html; 12 Kbytes"> 


<meta 
Content = "text/html; 12 Kbytes" 
Name = "DC.Format" 
> 
<meta name = "DC.Format™" content = "text/html; 12 Kbytes"> 


Use of these recommendations is known to result in metadata that may 
be harvested, indexed, and manipulated by popular, freely available 
software packages such as [SWISH-E], [freeWAIS-sf2.0], [GLIMPSE], 
[HARVEST], and [ISEARCH], among others. These conventions also work 
with the metadata processing scripts appearing in the appendix, as 
well as with most of the [DCPROJECTS] applications referenced from 
the [DCHOME] site. Software support for the LINK tag and qualifier 
conventions (see the next section) is not currently widespread. 


Ordering of metadata elements is not preserved in general. Writers 
of software for metadata indexing and display should try to preserve 
relative ordering among META tagged elements having the same name 
(e.g., among multiple authors), however, metadata providers and 
searchers have no guarantee that ordering will be preserved in 
metadata that passes through unknown systems. 


6. Dublin Core in Real Descriptions 


In actual resource description it is often necessary to qualify 
Dublin Core elements to add nuances of meaning. While neither the 
general principles nor the specific semantics of DC qualifiers are 
within scope of this document, everyday uses of the qualifier syntax 
are illustrated to lend realism to later examples. Without further 
explanation, the three ways in which the optional qualifier syntax is 
currently (subject to change) used to supplement the META tag may be 
summarized as follows: 


<meta lang "LANGUAGE_OF_METADATA CONTENT" ... > 


<meta scheme "CONTROLLED_FORMAT_OR_VOCABULARY_OF_METADATA™ ... > 
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<meta name = "PREFIX.ELEMENT_NAME.SUBELEMENT_NAME" ... > 


Accordingly, a posthumous work in Spanish might be described with 


<meta name = "DC.Language" 

scheme = "rfcl1766" 

content = "“es"> 
<meta name = "DCeTitle? 

lang = "es" 

content = "La Mesa Verde y la Silla Roja"> 
<meta name = "DC.Title" 

lang = "en" 

content = "The Green Table and the Red Chair"> 
<meta name = "DC.Date.Created" 

content = "1935"> 
<meta name = "DC.Date.Available" 

content = "1939"> 


Note that the qualifier syntax and label suffixes (which follow an 
element name and a period) used in examples in this document merely 


reflect current trends in the HTML encoding of qualifiers. Use of 
this syntax and these suffixes is neither a standard nor a 
recommendation. 


7. Encoding Dublin Core Elements 


This section consists of very simple Dublin Core encoding examples, 
arranged by element. 


Title (name given to the resource) 


<meta name = "DC.Title" 

content = "Polycyclic aromatic hydrocarbon contamination"> 
<meta name = "DC.Title" 

content = "Crime and Punishment"> 
<meta name = "DC.Title" 

content = "Methods of Information in Medicine, Vol 32, No 4"> 
<meta name = "DC.Title" 

content = "Still life #4 with flowers"> 
<meta name = "DC.Title" 

lang = "de" 

content = "Das Wohltemperierte Klavier, Teil I"> 
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<meta 
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<meta 
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(entity that created the content) 


name 
content 
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content 
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content 
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content 
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content 
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lang 
content 
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content 
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content 
name 
content 


(topic 


name 
content 
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scheme 
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content 
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scheme 
content 


name 
content 
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content 
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"DC.Creator" 
"Gogh, Vincent van"> 
"DC.Creator" 
"van Gogh, Vincent"> 


"DC.Creator" 
"Mao Tse Tung"> 
"DC.Creator" 
"Mao, Tse Tung"> 


"DC.Creator" 
"Plato"> 
"DC.Creator" 
TEYS 
"Platon"> 


"DC.Creator.Director" 
"Sturges, Preston"> 
"DC.Creator.Writer" 
"Hecht, Ben"> 
"DC.Creator.Producer" 
"Chaplin, Charles"> 


or keyword) 


"DC.Subject" 

"heart attack"> 
"DC.Subject" 

"MESH" 

"Myocardial Infarction; 


"DC.Subject" 
"vietnam war"> 
"DC.Subject" 

"LCSH" 

"Vietnamese Conflict, 


"DC.Subject" 
"Friendship"> 
"DC.Subject" 
" ddc " 
"158.25"> 


Informational 


December 1999 


Pericardial Effusion"> 


1961-1975"> 
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Description (account, summary, or abstract of the content) 


<meta name = "DC.Description" 
lang = "en" 
content = "The Author gives some Account of Himself and Family 
-—- His First Inducements to Travel -- He is 
Shipwrecked, and Swims for his Life -- Gets safe on 
Shore in the Country of Lilliput -- Is made a 
Prisoner, and carried up the Country"> 
<meta name = "DC.Description" 
content = "A tutorial and reference manual for Java."> 
<meta name = "DC.Description" 
content = "Seated family of five, coconut trees to the left, 


sailboats moored off sandy beach to the right, 
with volcano in the background."> 


Publisher (entity that made the resource available) 


<meta name = "DC.Publisher" 

content = "O’Reilly"> 
<meta name = "DC.Publisher" 

content = "Digital Equipment Corporation"> 
<meta name = "DC.Publisher" 

content = "University of California Press"> 
<meta name = "DC.Publisher" 

content = "State of Florida (USA)"> 


Contributor (other entity that made a contribution) 


<meta name = "DC.Contributor" 
content = "Curie, Marie"> 

<meta name = "DC.Contributor.Photographer" 
content = "Adams, Ansel"> 

<meta name = "DC.Contributor.Artist" 
content = "Sendak, Maurice"> 

<meta name = "DC.Contributor.Editor" 
content = "Starr, Kenneth"> 
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Date (of an event in the life of the resource; [WIN8601] recommended) 


<meta name = "DC.Date" 
content = "1972"> 

<meta name = "DC.Date" 
content = "1998-05-14"> 

<meta name = "DC.Date" 
scheme = "WTN8601" 
content = "1998-05-14"> 

<meta name = "DC.Date.Created" 
content = "1998-05-14"> 

<meta name = "DC.Date.Available" 
content = "1998-05-21"> 

<meta name = "DC.Date.Valid" 
content = "1998-05-28"> 

<meta name = "DC.Date.Created" 
content = "triassic"> 

<meta name = "DC.Date.Acquired" 
content = "1957"> 

<meta name = "DC.Date.Accepted" 
scheme = "WTN8601" 
content = "1998-12-02T16:59"> 

<meta name = "DC.Date.DataGathered" 
scheme = "ISO8601" 
content = "98-W49-3T1659"> 

<meta name = "DC.Date.Issued" 
scheme = "ANSI.X3.X30-1985" 
content = "19980514"> 


Type (nature, genre, or category; [DCT1] recommended) 


<meta name = "DC.Type" 
content = "poem"> 
<meta name = "DC.Type" 
scheme = "DCT1" 
content = "software"> 
<meta name = "DC.Type" 
content = "software program source code"> 
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"DC.Type" 
= "interactive video game"> 


= "DC.Type" 
= "DCT1" 
= "dataset"> 


= "DC.Type" 

= "web home page"> 

= "DC.Type" 

= "web bibliography"> 


= "DC.Type" 

= "painting"> 

= "DC.Type" 

"image; woodblock"> 

= "DC.Type" 

= "AAT" 

= "clipeus (portrait) "> 

= "DC.Type" 

= "en-US" 

= "image; advertizement"> 


= "DC.Type" 

= "DCT1" 

= "event"> 

= "DC.Type" 

= "event; periodic"> 


December 1999 


al or digital data format, plus optional dimensions) 


"DC.Format" 
= "text/xml"> 
"DC.Format" 
" IMT " 
= "text/xml"> 


= "DC.Format" 

= "IMT" 

= "image/jpeg"> 
= "DC.Format" 


= "A text file with mono-spaced tables and diagrams."> 


= "DC.Format" 
= "yideo/mpeg; 14 minutes"> 


Informational 
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"DC.Format" 
"unix tar archive, gzip compressed; 


"DC.Format" 
"watercolor; 23 cm x 31 cm"> 


the resource) 


"DC.Identifier" 
"http://foo.bar.org/zaf/"> 


"DC.Identifier" 
"urn:ietf:rfc:1766"> 


"DC.Identifier" 
"ISBN" 
"1-56592-149-6"> 


"DC.Identifier" 
" LCCN " 
"67-26020"> 


"DC.Identifier" 
"DOL " 
"10.12345/33-824688ab"> 


(reference to the resource’s origin) 


name 
content 


name 
content 


name 
content 
name 
scheme 
content 
name 
scheme 
content 


(of the 


"DC.Source" 
"Shakespeare's Romeo and Juliet"> 


"DC.Source" 
"http://a.b.org/manon/"> 


content of the resource; [RFC1766] 


"DC. Language" 
"en"> 

"DC. Language" 
"rfcl1766" 
"en"> 

"DC. Language" 
"ISO0639-2" 
"eng"> 


Informational 


December 1999 


1.5 Mbytes"> 


recommended) 
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<meta name = "DC.Language" 
scheme = "rfcl1766" 
content = "en-US"> 

<meta name = "DC.Language" 
content = "zh"> 

<meta name = "DC.Language" 
content = "ja"> 

<meta name = "DC.Language" 
content = "es"> 

<meta name = "DC.Language" 
content = "de"> 

<meta name = "DC.Language" 
content = "german"> 

<meta name = "DC.Language" 
lang = "fr" 
content = "allemand"> 


Relation (reference to a related resource) 


<meta name = "DC.Relation.IsPartoOf" 
content = "http://foo.bar.org/abc/proceedings/1998/"> 
<meta name = "DC.Relation.IsFormatoOf" 
content = "http://foo.bar.org/cd145.sgml"> 
<meta name = "DC.Relation.IsVersionoOf" 
content = "http://foo.bar.org/draft9.4.4.2"> 
<meta name = "DC.Relation.References" 
content = "urn:isbn:1-56592-149-6"> 
<meta name = "DC.Relation.IsBasedon" 
content = "Shakespeare’s Romeo and Juliet"> 
<meta name = "DC.Relation.Requires" 
content = "LWP::UserAgent; HTIML::Parse; URI::URL; 
Net::DNS; Tk::Pixmap; Tk::Bitmap; Tk::Photo"> 


Coverage (extent or scope of the content) 


<meta name = "DC.Coverage" 
content = "US civil war era; 1861-1865"> 
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<meta name = "DC.Coverage" 

content = "Columbus, Ohio, USA; Lat: 39 57 N Long: 082 59 W"> 
<meta name = "DC.Coverage" 

scheme = "TGN" 

content = "Columbus (C,V) "> 
<meta name = "DC.Coverage.Jurisdiction" 

content = "Commonwealth of Australia"> 


Rights (text or identifier of a rights management statement) 


<meta name = "DC.Rights" 

lang = "en" 

content = "Copyright Acme 1999 - All rights reserved."> 
<meta name = "DC.Rights" 

content = "http://foo.bar.org/cgi-bin/terms"> 


8. Security Considerations 


The syntax rules for encoding Dublin Core metadata in HTML that are 
documented here pose no direct risk to computers and networks. 

People can use these rules to encode metadata that is inaccurate or 
even deliberately misleading (creating mischief in the form of "index 
spam"), however, this reflects a general pattern of HTML META tag 
abuse that is not limited to the encoding of metadata from the Dublin 
Core set. Even traditional metadata encoding schemes (e.g., [MARC]) 
are not immune to inaccuracy, although they are generally followed in 
environments where production quality greatly exceeds that of the 
average Web site. 


Systems that process metadata encoded with META tags need to consider 
issues related to its accuracy and validity as part of their design 
and implementation, and users of such systems need to consider the 
design and implementation assumptions. Various approaches may be 
relevant for certain applications, such as adding statements of 
metadata provenance, signing of metadata with digital signatures, and 
automating certain aspects of metadata creation; but these are far 
outside the scope of this document and the underlying META tag syntax 
that it describes. 
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9. 


Appendix -- Perl Scripts that Manipulate HIML Encoded Metadata 


This section contains two simple programs that work with versions 4 
and 5 of the Perl [PERL] scripting language interpreter. They may be 
taken and freely adapted for local organizational needs, research 
proposals, venture capital bids, etc. A variety of applications are 
within easy reach of implementors that choose to build on these 
scripts. 


Script 1: Metadata Format Conversion 


Here is a simple Perl script that correctly recognizes every example 
of metadata encoding in this document. It shows how a modest 
scripting effort can produce a utility that converts metadata from 
one format to another. Minor changes are sufficient to support a 
number of output formats. 


#!/depot/bin/perl 


Sh E SR SR SR SE SR th 


This simple perl script extracts metadata embedded in an HTML file 
and outputs it in an alternate format. Issues warning about missing 
element name or value. 


Handles mixed case tags and attribute values, one per line or spanning 
several lines. Also handles a quoted string spanning multiple lines. 
No error checking. Does not tolerate more than one "<meta" per line. 


print "@(urc;\n"; 
while (<>) { 


next if (! /<meta/i); 
(Smeta) = /(<meta.*$)/i; 
if (! /<meta.*>/i) { 
while (<>) { 
Smeta .= $_; 
last if (/>/); 


} 


Sname = Smeta =~ /name\s*=\s*"([0"]*)"/i 
? $1 : "MISSING ELEMENT NAME"; 
$content = Smeta =" /content\s*=\s*"([0"]*)"/i 
? $1 : "MISSING ELEMENT VALUE"; 
(Sscheme) = Smeta =~ /scheme\s*=\s*"([4"]*)"/i; 
($lang) = Smeta =" /lang\s*=\s*"([4"]*)"/i; 
if ($lang || $scheme) { 
Smod = " (Slang"; 
if (! Sscheme) 
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{ $mod .= ")"; } 
elsif (! Slang) 
{ Smod .= "Sscheme)" } 
else 
{ Smod .= ", Sscheme)"; } 
} 
else 
{ $mod = ""; } 
print " @|Sname$mod; $content\n"; 
} 
print "@)urc;\n"; 
# ---- end of Perl script ---- 


When the conversion script is run on the metadata file example from 
the LINK tag section (section 4), it produces the following output. 


@ (urc; 
@|DC.Title; A Dirge 
@|DC.Creator; Shelley, Percy Bysshe 
@|DC.Type; poem 
@)/DC.Date; 1820 
@|DC.Format; text/html 
@|DC.Language; en 

@)urc; 


Script 2: Automated Metadata Creation 


The creation and maintenance of high-quality metadata can be 
extremely expensive without automation to assist in processes such as 
supplying pre-set or computed defaults, validating syntax, verifying 
value ranges, spell checking, etc. Considerable relief could be had 
from a script that reduced an individual provider’s metadata burden 
to just the title of each document. Below is such a script. It lets 
the provider of an HIML document abbreviate an entire embedded 
resource description using a single HTML comment statement that looks 
like 


<!--metablock Little Red Riding Hood --> 


Our script processes this statement specially as a kind of "metadata 
block" declaration with attached title. The general form is 


<!--metablock TITLE_OF_DOCUMENT --> 
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This statement works much like a "Web server-side include" in that 
the script replaces it with a fully-specified block of metadata and 


triggers other replacements. Once installed, the script can output 
HTML files suitable for integration into one’s production Web server 
procedures. 


The individual provider keeps a separate "template" file of 
infrequently changing pre-set values for metadata elements. If the 
provider’s needs are simple enough, the only element values besides 
the title that differ from one document to the next may be generated 
automatically. Using the script, values may be referenced as 
variables from within the template or within the document. Our 
variable references have the form "(-—-mbVARNAME)", and here is what 
they look like inside a template: 


<title> (--mbtitle) </title> 
<meta name = "DC.Creator" 
content = "Simpson, Homer"> 
<meta name =. DCTI ELST 
content = "(--mbtitle)"> 
<meta name = "DC.Date.Created" 
content = "(--mbfilemodtime) "> 
<meta name = "DC.Identifier" 
content = "(--mbbaseURL) / (--mbfilename) "> 
<meta name = "DC.Format" 
content = "text/html; (--mbfilesize) "> 
<meta name = "DC.Language" 
content = "(--mblanguage) -BUREAUCRATESE"> 
<meta name = "RC.MetadataAuthority" 
content = "Springfield Nuclear"> 
<link rel = "schema.DC" 
href = "http://purl.org/DC/elements/1.0/"> 
<link rel = "schema.RC" 
href = "http://nukes.org/ReactorCore/re"> 


The above template represents the metadata block that will describe 
the document once the variable references are replaced with real 
values. By the conventions of our script, the following variables 
will be replaced in both the template and in the document: 


(--mbfilesize) size of the final output file 
(--mbtitle) title of the document 

(--mblanguage) language of the document 

(--mbbaseURL) beginning part of document identifier 
(--mbfilename) last part (minus .html) of identifier 
(--mbfilemodtime) last modification date of the document 
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Here’s an example HTML file to run the script on. 


<html> 

<head> 

<!--metablock Nutritional Allocation Increase --> 

<meta name = "DC.Type" 
content = "Memorandum"> 

</head> 

<body> 

<p> 

From: Acting Shift Supervisor 

To: Plant Control Personnel 

RE: (--mbtitle) 

Date: (--mbfilemodtime) 

<p> 


Pursuant to directive DOH:10.2001/405aec of article B-2022, 
subsection 48.2.4.4.1c regarding staff morale and employee 
productivity standards, the current allocation of doughnut 
acquisition funds shall be increased effective immediately. 
</body> 
</html> 


Note that because replacement occurs throughout the document, the 
provider need only enter the title once instead of twice (normally 
the title must be entered once in the HTML head and again in the HTML 


body). After running the script, the above file is transformed into 
this: 
<html> 
<head> 
<title> Nutritional Allocation Increase </title> 

<meta name = "DC.Creator" 

content = "Simpson, Homer"> 
<meta name = "DCaritlet 

content = "Nutritional Allocation Increase"> 
<meta name = "DC.Date.Created" 

content = "1999-03-08"> 
<meta name = "DC.Identifier" 

content = "http://moes.bar.com/doh/homer.htm1"> 
<meta name = "DC.Format" 

content = "text/html; 1320 bytes"> 
<meta name = "DC.Language" 

content = "en-BUREAUCRATESE"> 
<meta name = "RC.MetadataAuthority" 

content = "Springfield Nuclear"> 
<link rel = "schema.DC" 

href = "http://purl.org/DC/elements/1.0/"> 
<link rel = "schema.RC" 
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href = "http://nukes.org/ReactorCore/re"> 
<meta name = "DC.Type" 
content = "Memorandum"> 
</head> 
<body> 
<p> 
From: Acting Shift Supervisor 
To: Plant Control Personnel 
RE: Nutritional Allocation Increase 
Date: 1999-03-08 
<p> 


Pursuant to directive DOH:10.2001/405aec of article B-2022, 
subsection 48.2.4.4.1c regarding staff morale and employee 
productivity standards, the current allocation of doughnut 
acquisition funds shall be increased effective immediately. 
</body> 
</html> 


Here is the script that accomplishes this transformation. 
#!/depot/bin/perl 


This Perl script processes metadata block declarations of the form 
<!--metablock TITLE_OF_DOCUMENT --> and variable references of the 
form (--mbVARNAME), replacing them with full metadata blocks and 
variable values, respectively. Requires a "template" file. 
Outputs an HTML file. 


Invoke this script with a single filename argument, "foo". It creates 
an output file "foo.html" using a temporary working file "foo.work". 
The size of foo.work is measured after variable replacement, and is 
later inserted into the file in such a way that the file’s size does 
not change in the process. Has little or no error checking. 


Se 4b SR SE SR FR GR SE SR GE SR Se 


Sinfile = shift; 
open(IN, "< Sinfile") 
or die("Could not open input file \"S$infile\""); 
Sworkfile = "Sinfile.work"; 
unlink (Sworkfile); 
open (WORK, "+> Sworkfile") 
or die("Could not open work file \"$workfile\""); 


@offsets = (); # records locations for late size replacement 
Stitle = ""; # gets the title during metablock processing 
Slanguage = "en"; # pre-set language here (not in the template) 
SbaseURL = "http://moes.bar.com/doh"; # pre-set base URL here also 
$filename = "Sinfile.htmlL"; # final output filename 
Sfilesize = "(--mbfilesize)"; # replaced late (separate pass) 
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(Syear, 


$month, $day) = (localtime( (stat IN) [9] ))[5, 4, 3]; 


Sfilemodtime = sprintf "%s-%02s-%02s", 1900 + $year, 1 + $month, $day; 


sub putout { # outputs current line with variable replacement 
if (! /\(--mb/) { 
print WORK; 
return; 
} 
if (/\(--mbfilesize\) /) # remember where it was 


} 


while 


Kunze 


{ push @offsets, tell WORK; } # but don’t replace yet 


s/\(--mbtitle\) /Stitle/g; 

s/\ (--mblanguage\) /Slanguage/g; 
s/\ (--mbbaseURL\) /SbaseURL/g; 
s/\ (--mbfilename\) /$filename/g; 


s/\ (--mbfilemodtime\) /$filemodtime/g; 
print WORK; 


(<IN>) { # main loop for input file 
if (! /(.*)<!--metablock\s*(.*)/) { 
é&éputout; 
next; 


} 
Stitle = $2; 


$_ = $1; 
é&putout; 
if ($title =" s/\s*-->(.*)//) í 
Sremainder = $1; 
} 
else { 
while (<IN>) { 
Stitle .= $_; 
last if (/(.*)\s*-->(.*)/); 
} 
Stitle .= $1; 
Sremainder = $2; 


} 

open(TPLATE, "< template") 
or die("Could not open template file"); 

while (<TPLATE>) # subloop for template file 
{ &putout; } 

close (TPLATE) ; 

$_ = Sremainder; 

é&éputout; 
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} 
close (IN); 


# Now replace filesize variables without altering total byte count. 


select ( (select (WORK), $| = 1) [0] ); # first flush output so we 
if (($size = -s WORK) < 100000) # can get final file size 

{ $scale = 0; } # and set scale factor or 
else { # compute it, keeping width of size field low 


for ($scale = 0; $size >= 1000; $scale++) 
{ $size /= 1024; } 
} 


Sfilesize = sprintf "%7.7s %sbytes", 
Ssize, (n ne "K", "M", "Go", ERA "pM) [Sscale]; 

foreach S$pos (@offsets) { # loop through saved size locations 
seek WORK, Spos, 0; # read the line found there 
$_ = <WORK>; 
# Sfilesize must be exactly as wide as "(--mbfilesize)" 
s/\(--mbfilesize\) /$filesize/g; 
seek WORK, Spos, 0; # rewrite it with replacement 


print WORK; 
} 


close (WORK) ; 
rename (Sworkfile, "$filename") 

or die("Could not rename \"Sworkfile\" to \"Sfilename\"") ; 
# ---- end of Perl script ---- 
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